'   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
 
 '     W r i t e   a n d   r e a d   m a n y   t i m e s 
 
 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 
 
 
 
 B u t t o n   1   T e x t   " I t e r a t i o n " 
 
 B u t t o n   2   T e x t   " B t n 2 " 
 
 
 
 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   W R I T E   a n d   R E A D 
 
 F o r   v 1   =   1   T o   1 0 0 0 0 0 
 
 	 S l o t T e x t ( 1 )   =   "   " 
 
 	 s 1   =   S l o t T e x t ( 1 ) 
 
 	 I f   M o d ( v 1 ,   1 0 0 0 )   =   0 
 
 	 	 B u t t o n   B t n 2   T e x t   v 1 
 
 	 E n d I f 
 
 N e x t 
 
 '   - - - - - - - - - - - - - - - - - - - - - - - - - - - - -   R E A D   O N L Y 
 
 S l o t T e x t ( 1 )   =   "   " 
 
 F o r   v 1   =   1   T o   1 0 0 0 0 0 
 
 	 s 1   =   S l o t T e x t ( 1 ) 
 
 	 I f   M o d ( v 1 ,   1 0 0 0 )   =   0 
 
 	 	 B u t t o n   B t n 2   T e x t   v 1 
 
 	 E n d I f 
 
 N e x t 
 
 
 
 
 
 